﻿Imports Entidades ' PARA PODER IMPORTAR HAY QUE AGREGAR LA REFERENCIA A LA CAPA DE ENTIDADES y DATOS EN My Project
Imports Datos
Imports Interfaces
Public Class daoCategorias
    Inherits ICategoria
    Dim x As DBCategorias
    Sub New()
        x = New DBCategorias
    End Sub
    Public Overrides Function Altacategoria(ByVal nodo As Categorias) As Boolean
        Return x.Altacategoria(nodo)
    End Function
    Function Bajacategorias(ByVal nodo As Categorias) As Boolean
        Return x.Bajacategorias(nodo)
    End Function
    Overrides Function consultacategoria() As ArrayList
        Return x.consultacategoria ' LA CAPA DE DATOS DEVUELVE ARRAYLIST EL CUAL LO DEVUELVO A LA CAPA VISUAL

    End Function
End Class
